(defun intro ()
  "key driven music player"
  (interactive)
  (message "welcome"))

(intro)

(defun lyricsMp3 ()
  (interactive)
  (with-help-window "*Audio*"
    (with-current-buffer "*Audio*"
      (princ "Play list"))))


(async-start
 (lambda ()
    (shell-command-to-string "ls -la")
   )

 (lambda (result)
   (message "Async process done, result should be : %s" result)
   ))
(lyricsMp3)
